home *** CD-ROM | disk | FTP | other *** search
/ Softdisk Supreme / Softdisk Supreme.iso / pc / DSK Files / 0-49 / SD017a.dsk / INTRO.TO.GAME.bas < prev    next >
BASIC Source File  |  2003-06-12  |  2KB  |  43 lines
  1. 0  DATA     173,48,192,136,208,4,198,1,240,8,202,208,246,166,0,76,3,3,96 : HIMEM: 26110: GOSUB 2000
  2. 5  PRINT  CHR$(4);"BLOAD PICDRAWF"
  3. 10  PRINT  CHR$(4);"BLOAD GROUP1,A26624"
  4. 11  HOME : VTAB 5: HTAB 10: PRINT "NOTE FROM SOFTY": PRINT : PRINT : PRINT "CARL'S ADDRESS IS:"
  5. 12  PRINT : PRINT "CARL BOWDEN": PRINT "P.O. BOX 818": PRINT "HEBBRONVILLE, TEXAS 78361"
  6. 13  PRINT : PRINT : PRINT "GREAT JOB CARL...": PRINT : PRINT "ALL SOFT PEOPLE THANK YOU."
  7. 14  PRINT : PRINT : HTAB 12: PRINT "HIT A KEY ";: GET R$: PRINT R$
  8. 20  HOME 
  9. 30  VTAB 1: HTAB 8
  10. 40  PRINT "A HI-RES ADVENTURE GAME"
  11. 50  VTAB 3: HTAB 13
  12. 60  PRINT "BY CARL BOWDEN"
  13. 62  VTAB 5: HTAB 2
  14. 64  PRINT "GRAPHICS BY 'THE GRAPHICS MAGICIAN'": HTAB 15: PRINT "..PENGUIN SOFTWARE..."
  15. 70  VTAB 8: HTAB 1
  16. 80  PRINT "THIS HI-RES GAME IS PLAYED IN A MANNER  SIMILAR TO ALL ADVENTURE GAMES."
  17. 90  PRINT "THAT IS, COMMANDS ARE ENTERED AS ONE OR TWO WORD INSTRUCTIONS."
  18. 95  PRINT 
  19. 100  PRINT "FOR EXAMPLE: INPUT 'GET APPLE' AND PRESSRETURN AND IF THERE IS AN APPLE TO BE   GOT, IT WILL BECOME PART OF YOUR        INVENTORY."
  20. 105  PRINT 
  21. 110  PRINT "HOWEVER, TO MAKE IT EASIER, THE VERBS ORONE WORD COMMANDS (NORTH, QUIT, ETC.)   ARE ALREADY PROGRAMMED SO THAT IF YOU   PRESS 'G' FOR EXAMPLE, 'GET' POPS OUT."
  22. 120  VTAB 23: HTAB 1
  23. 130  PRINT "PRESS ANY KEY TO CONTINUE."
  24. 140  IF  PEEK( -16384) <127  THEN  GOTO 140
  25. 150  POKE  -16368,0
  26. 160  HOME : VTAB 1: HTAB 1
  27. 170  PRINT "IN GENERAL, THE FIRST LETTER OF A WORD  CORRESPONDS TO THE DESIRED WORD INPUTED."
  28. 180  PRINT "THE ONLY EXCEPTION IS 'UNLOCK' WHICH IS INPUTED WITH 'Z' SINCE 'U' IS FOR 'USE'."
  29. 190  PRINT "IF YOU MAKE AN ERROR, HIT RETURN AND TRYAGAIN.  THIS WAY, YOU CAN EASILY CHECK  THE WORDS AVAILABLE TO YOU."
  30. 200  PRINT "PRESSING RETURN WITHOUT A WORD TO CLEAR WILL CHANGE FROM HI-RES TO TEXT AND     VICE VERSA."
  31. 210  PRINT 
  32. 220  PRINT "ONE WORD COMMANDS MUST BE FOLLOWED BY   A SECOND ARBITRARY WORD OR LETTER,      OTHERWISE THE WORD WILL CLEAR.          EXAMPLE: 'INVENTORY X' WILL LIST THE    ITEMS YOU ARE CARRYING."
  33. 225  PRINT 
  34. 230  PRINT "SECOND WORDS MUST BE SPELLED OUT        COMPLETELY AS IN ANY ADVENTURE GAME."
  35. 240  VTAB 24: HTAB 1
  36. 250  PRINT "PRESS ANY KEY TO PLAY GAME.";
  37. 260  IF  PEEK( -16384) <127  THEN 260
  38. 270  POKE  -16368,0
  39. 1998  PRINT 
  40. 1999  PRINT  CHR$(4);"RUN GAME1"
  41. 2000  PRINT  CHR$(4);"BLOAD SST/ML,A16384"
  42. 2010  PRINT  CHR$(4);"BLOAD UFO TABLE.SST,A26112"
  43. 2020  FOR I = 771 TO 789: READ A: POKE I,A: NEXT : RETURN